Top 10k strings from Prediction Birthday File, The (1985)(Blandford Press).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   2 li,co;x$;:
   2 ;"********************************";:
   2 );"/";d$(3
   2 );"/";d$(2
   1 x$="0"+x$:
   1 set start of buffer
   1 save search params
   1 s$="                                ":
   1 restore search params
   1 reset database on first run
   1 ma+362,255:
   1 li,co;d$(2
   1 li,co;d$(1
   1 li,co;"BAD DATE";:
   1 li,co+x;b$;:
   1 li,co+x;" ";:
   1 li,co+x;" ";
   1 j$="JanFebMarAprMayJunJulAugSepOctNovDec"
   1 instructions
   1 get record from buffer
   1 f$(l)=d$(l):
   1 dt=j(d2)+d1:
   1 dim vars and initialise
   1 bfile     
   1 bbook     j
   1 bbook     `R
   1 a$="The Prediction Birthday File":
   1 Put data into buffer
   1 LITIES FOR**
   1 JanFebMarAprMayJunJulAugSepOctNovDec
   1 Created with Ramsoft MakeTZX
   1 ;******DATA
   1 ;"When you wish to perform certainfunctions you are prompted to   'Enter your search details'.":
   1 ;"VERIFYING FILE NOW";:
   1 ;"This program has been specially designed for the Spectrum so    that if you should BREAK out of the program or cause the programto halt then you may type RUN   without loosing any data except for the Birthday on which you   were working."
   1 ;"This option will destroy the    current Birthday File !!!":
   1 ;"The displays which show zodiac  details also list stones,metals,plants etc related to that sign.":
   1 ;"Sorry I cant find this record"
   1 ;"SURNAME:";:
   1 ;"SAVING FILE NOW";:
   1 ;"Rewind the tape to the start":
   1 ;"REMEMBER Type RUN to restart"
   1 ;"Press any key to continue":
   1 ;"Press <<";:
   1 ;"Please ensure that you use a    separate tape for storing your  Birthday File and that you labelit carefully. This will ensure  that you can expand your system into several volumes over the   years."
   1 ;"PRESENT";
   1 ;"O.K. A new Birthday File is now set up and ready to use."
   1 ;"LOADING CODE":
   1 ;"Insert the cassette and rewind  it to the correct position."
   1 ;"Insert a cassette wound on to   the correct position into the   cassette recorder."
   1 ;"If you have forgotten to save   your birthday file to cassette  then just type <<RUN>> and go tosection 6.  You will not loose  any data."
   1 ;"INSTRUCTIONS (Y/N)?";:
   1 ;"For the 48k Spectrum"
   1 ;"FIRST NAME:";:
   1 ;"Enter your search details";
   1 ;"Enter your choice(1 to 3):";
   1 ;"Enter your choice (1 to 7):";:
   1 ;"Enter your choice (1 to 12):";:
   1 ;"Do you want to VERIFY this file (Y/N):";:
   1 ;"Correct record? (Y/N)";:
   1 ;"Copyright J.C.Botibol 1985"
   1 ;"Continue (Y/N)?";:
   1 ;"BLANDFORD PRESS";:
   1 ;"BIRTHDAY (ddmmyy):";
   1 ;"7) Exit"
   1 ;"6) Save/Load a birthday file"
   1 ;"5) View Zodiac details"
   1 ;"4) List birthdays"
   1 ;"3) Quit to menu":
   1 ;"3) Display a birthday"
   1 ;"2) Save a File":
   1 ;"2) Change/delete birthdays"
   1 ;"1) Load a File":
   1 ;"1) Enter birthdays"
   1 ;"******************************";:
   1 ;"******************************";
   1 ;"*                              *";:
   1 ;"  Your Birthday File is full":
   1 12,0;"Do you want to specify a star   sign in the search (Y/N)";:
   1 *****BIRTHDAY BOOK*******
   1 **********1985***********
   1 );" 19";d$(3
   1 );" ";n$(2
   1 "yet may be impulsive"
   1 "with tact and diplomacy. Libr-"
   1 "wit. Naturally inhibited but"
   1 "unsentimental fun people. Like"
   1 "unexpected. This is a sign of "
   1 "to live fast and furious and"
   1 "the mystic_constantly changing"
   1 "technology. A confident"
   1 "so can be moody. Hoader"
   1 "sincere but liable to worry."
   1 "self-sufficient. Flourish in"
   1 "romantic but hypersensitive"
   1 "personal magnetism."
   1 "originality. In tune with"
   1 "open and blunt. Disregard for"
   1 "of self deception. Usually well"
   1 "ness. Versatile_intelligent"
   1 "mmend ";:
   1 "maturity-they are survivors."
   1 "lovers. Sunny and romantic"
   1 "loved_gentle and intuitive"
   1 "lar.Open minded_optimistic and"
   1 "jungle. Broad minded_expansive"
   1 "jealous and possessive"
   1 "intelligent. Tends to be rat-"
   1 "industrious and trustworthy."
   1 "impressionable_warm_loving."
   1 "if not carefull"
   1 "hidden depths but can be"
   1 "her decisive and inconsistent"
   1 "gnore ";:
   1 "generous also"
   1 "exterior hides indecision and "
   1 "explore the unknown. Tend to"
   1 "exciting & determined beneath"
   1 "elete ";:
   1 "ders and wonderful parents but"
   1 "danger. Dynamic & enterprising"
   1 "conversationalists"
   1 "conformist. Passion for"
   1 "but tend to be very stubborn"
   1 "be slapdash and superficial"
   1 "be restless and like the"
   1 "basically insecure"
   1 "ans long for love and marriage"
   1 "and wine. A materialit but"
   1 "and the enjoyment of good food"
   1 "and self confident power"
   1 "adaptable people. They tend to"
   1 "_good with money_great provi-"
   1 "You will find that certain      entries limit you to numeric    keys and others to alphabetic   keys. In all cases you can use  DELETE (SHIFT 0) to erase the   last key pressed."
   1 "You should relate these details to your book in which you will  find more detailed information."
   1 "You must save this File to tape and start a new one."
   1 "Would you like to start a new   File now? (y/n):"
   1 "Very loyal and loves attention"
   1 "VIRGO","Soft Brown","Mercury","Earth","Wenesday","5","Platinum","Silver Birch","Anemone","Pink Jasper","Sean Connery","Denis Healey","Jimmy Connors","Raquel Welch","Peter Sellers","Harry Secombe"
   1 "Uncomplicated_dependable and"
   1 "They dislike being hemmed in"
   1 "Therefore simply pressing B (capB) for a Surname will find all  people whose surname starts withB. You can use any combination  of search parameters in this    powerful feature."
   1 "The true romantic-must be aware"
   1 "The sign of a genius. The non"
   1 "The natural leader in the"
   1 "The born fighter. Courageous"
   1 "THE PREDICTION BIRTHDAY FILE";:
   1 "TAURUS","Green","Venus","Earth","Friday","6","Copper","Ash","Daisy","Emerald","The Queen","Will Shakepeare","Fred Astaire","Barb. Streisand","Henry Cooper","Bing Crosby"
   1 "Simply pressing 'ENTER' will    tell the computer to ignore thatentry when searching for a matchDates will be displayed as 00   for this 'WILD CARD' feature."
   1 "Sensitive_sympathetic"
   1 "Scorpios are usually spectacu-"
   1 "SCORPIO","Dark Red","Pluto","Water","Tuesday","9","Iron","Redwoods","Lilac","Malachite","Prince Charles","Diana Dors","Geof Boycott","John Cleese","Ken Dodd","Roy Jenkins"
   1 "SAGITTARIUS","Purple","Jupiter","Fire","Thursday","3","Tin","Oak","Borage","Amethyst","Ian Botham","Ernie Wise","Walt Disney","Beethoven","Ronnie Corbett","Andy Williams"
   1 "Romantic_intuitive and "
   1 "Reserved but tough with droll"
   1 "Reliable_prudent_cautious and "
   1 "Press RECORD and PLAY and then  hit any key to save your File"
   1 "Please enter 'OK' to continue"
   1 "Perhaps a dreamer?"
   1 "Patiemt trustworthy and loyal."
   1 "Passionate and intense. Great"
   1 "Passionate and demonstative"
   1 "PISCES","Silver Blue","Neptune","Water","Thursday","7","Silver","Platinum","Hawthorn","Aquamarine","Jilly Cooper","Bruce Forsyth","Frankie Howard","Lord Snowdon","Prince Edward","Douglas Bader"
   1 "Main characteristic is kind-"
   1 "Likes to maintain a balence"
   1 "LIBRA","Pale Green","Venus","Air","Friday","6","Copper","Peach","Columbine","Sapphire","Ronnie Barker","John Lennon","Maggie Thatcher","Cliff Richard","Steve Ovett","Brigitte Bardot"
   1 "LEO","Orange","Sun","Fire","Sunday","1","Gold","Laurel","Marigold","Adventurine","Clive Sinclair","Terry Wogan","Willie Rushton","Steve Davis","Henry Ford","Alan Wicker"
   1 "Inclined to the outdoor life"
   1 "I hope you have fun using this  program."
   1 "Generally entertaining"
   1 "GEMINI","Yellow","Mercury","Air","Wednesday","Fire","Platinum","Laburnum","Aniseed","Peridot","Bob Hope","Clint Eastwood","Prince Philip","Prince William","Joan Collins","Anita Harris"
   1 "Ensure that the correct leads   connected to the correct socketsand then press PLAY.";:
   1 "Ensure that the correct leads   are connected to the correct    sockets."
   1 "Earmarked for success!"
   1 "Competitive and ambitious with"
   1 "Capable and fastidous_loyal"
   1 "CAPRICORN","Dark Brown","Saturn","Earth","Saturday","8","Lead","Yew","Pansy","Onyx","Noel Edmonds","Al Capone","Rudyard Kipling"," Vic. Principal","Rowan Atkinson","Elvis Presley"
   1 "CANCER","Silver","Moon","Water","Monday","2","Silver","Weeping Willow","Lillies","Pearls","Esther Ranzen","Princess_Wales","Yul Brenner","Julius Caesar","Ringo Starr","Dr Barnardo"
   1 "Are you SURE you want to carry  on?":
   1 "Also displayed are a variety of famous people of the same sign."
   1 "ARIES","Bright Red","Mars","Fire","Tuesday","9","Iron","Holly","Geranium","Diamond","Steve McQueen","Elton John","Omar Shariff","Clare Francis","Doris Day","David Frost"
   1 "AQUARIUS","Elect Blue","Uranus","Air","Saturday","4","Lead","Limefruit","Primrose","Turqoise","Telly Savalas","Claire Rayner","Princess Caroline","Neil Diamond","Paul Newman","Ronald Reagan"
   1 ">> to stop";
   1 "================================";
   1 "9) Libra       Sep23-Oct22"
   1 "8) Virgo       Aug23-Sep22"
   1 "7) Leo         Jul23-Aug22"
   1 "6) Cancer      Jun22-Jul22"
   1 "5) Gemini      May22-Jun21"
   1 "4) Taurus      Apr21-May21"
   1 "3) Aries       Mar22-Apr20"
   1 "2) Pisces      Feb20-Mar21"
   1 "12)Capricorn   Dec22-Jan20"
   1 "11)Sagittarius Nov22-Dec21"
   1 "10)Scorpio     Oct23-Nov21"
   1 "1) Aquarius    Jan21-Feb19"
   1  "Imagintive_retiring_incurably"
   1                     Barry               
   1                                         
   1